home *** CD-ROM | disk | FTP | other *** search
/ Haight-Ashbury in the Sixties / Haight-Ashbury in the Sixties (1996)(Rockument)(Disc 1 of 2)[Mac-PC].iso / mac / MAIN / TUNEIN / TUNEIN01.DIR / 00170_Script_170 < prev    next >
Text File  |  1995-06-01  |  903b  |  37 lines
  1. on mouseDown
  2.   global thisVideo, thisLine
  3.   set thisVideo = ""
  4.   set thisLine = the mouseLine
  5.   if thisLine = 1 then 
  6.     set thisVideo = "cassady/bus"
  7.     hilite line thisLine of field "video/events"  
  8.     set the cursor of sprite 5 = 0
  9.     cursor 4
  10.     go to frame "play video"
  11.   end if
  12.   
  13.   if thisLine = 2 then 
  14.     set thisVideo = "kesey/trips"
  15.     hilite line thisLine of field "video/events"  
  16.     set the cursor of sprite 5 = 0
  17.     cursor 4
  18.     go to frame "play video"
  19.   end if
  20.   
  21.   if thisLine = 3 then 
  22.     set thisVideo = "leary/bein"
  23.     hilite line thisLine of field "video/events"  
  24.     set the cursor of sprite 5 = 0
  25.     cursor 4
  26.     go to frame "play video"
  27.   end if
  28.   
  29.   
  30.   if thisLine > 4 then 
  31.     alert "These additional videos are on Disc #2/ASHBURY. Quit and restart with that disc."
  32.     set thisVideo = ""
  33.     cursor [547,548]
  34.   end if
  35.   
  36. end
  37.